Empresas

Dow fabrica produtos:

Union Carbide fabrica produtos:

Allied Chemical fabricou:

  • Utensílios (Polímeros)
  • Combustíveis fósseis
  • Tecnologias aeroespacial
  • Site da empresa

Exxon fabrica:

Texaco fabrica:

Análise exploratória

Dados

Correlações

Grafo de correlações

Fatores

Nº de fatores

Principal com 3 fatores

##                             RC1       RC3       RC2
## SS loadings           1.8035377 1.2011808 1.1989599
## Proportion Var        0.3607075 0.2402362 0.2397920
## Cumulative Var        0.3607075 0.6009437 0.8407357
## Proportion Explained  0.4290380 0.2857452 0.2852168
## Cumulative Proportion 0.4290380 0.7147832 1.0000000

Sugestão: 2 fatores

Proporção acumulada dos autovetores

## eigen() decomposition
## $values
## [1] 0.0035912002 0.0007930750 0.0007335169 0.0005078713 0.0003485510
## 
## $vectors
##            [,1]        [,2]        [,3]        [,4]        [,5]
## [1,] -0.5611191  0.72927220  0.16709490 -0.28837835 -0.20548626
## [2,] -0.4708419 -0.11249171  0.44785636  0.70468458  0.26172094
## [3,] -0.2908746 -0.08686348 -0.62317234  0.40840695 -0.59389116
## [4,] -0.2820591  0.10777963 -0.61238712 -0.05270487  0.72871835
## [5,] -0.5470721 -0.66056488  0.09023429 -0.50068306 -0.07443388
Variação acumulada 
## [1] " 60,11%" " 73,39%" " 85,66%" " 94,17%" "100,00%"
  • Sugestão: 2 (70%) ou 3 (80%) fatores

Conclusão: serão usados 2 fatores.

Sem rotação

## 
## Call:
## factanal(x = x, factors = 2, scores = "none", rotation = "none")
## 
## Uniquenesses:
## Allied Chemical         Du Pont           Exxon          Texaco   Union Carbide 
##           0.495           0.265           0.611           0.178           0.473 
## 
## Loadings:
##                 Factor1 Factor2
## Allied Chemical  0.682   0.202 
## Du Pont          0.686   0.515 
## Exxon            0.621         
## Texaco           0.798  -0.432 
## Union Carbide    0.674   0.270 
## 
##                Factor1 Factor2
## SS loadings      2.410   0.569
## Proportion Var   0.482   0.114
## Cumulative Var   0.482   0.596
## 
## Test of the hypothesis that 2 factors are sufficient.
## The chi square statistic is 0.66 on 1 degree of freedom.
## The p-value is 0.418

Rotação utilizando Varimax

## 
## Call:
## factanal(x = x, factors = 2, scores = "none", rotation = "varimax")
## 
## Uniquenesses:
## Allied Chemical         Du Pont           Exxon          Texaco   Union Carbide 
##           0.495           0.265           0.611           0.178           0.473 
## 
## Loadings:
##                 Factor1 Factor2
## Allied Chemical 0.606   0.372  
## Du Pont         0.841   0.166  
## Exxon           0.370   0.501  
## Texaco          0.212   0.882  
## Union Carbide   0.651   0.320  
## 
##                Factor1 Factor2
## SS loadings      1.682   1.297
## Proportion Var   0.336   0.259
## Cumulative Var   0.336   0.596
## 
## Test of the hypothesis that 2 factors are sufficient.
## The chi square statistic is 0.66 on 1 degree of freedom.
## The p-value is 0.418

Grafo dos fatores

Dow fabrica produtos:

  • Polímeros

Union Carbide fabrica produtos:

  • Polímeros

Allied Chemical fabricou:

  • Polímeros
  • Combustíveis fósseis

Exxon fabrica:

  • Combustíveis fósseis

Texaco fabrica:

  • Combustíveis fósseis

Comparação de Fatorial e PCA

Variância capturada

Pesos

Comparação de peso

Análise das variáveis nos componentes

Fator vs PC